/ BBS in a Box 11 / AMUG BBS in a Box Volume XI (April 1994) (MacWizards).iso / Files / Tele / I-L / LineShare Demo2.0.sit / LineShare Demo2.0 / LineShare Files / LineShare Scripts / Generic Fax2&ARA&Data

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 15 47 65 6e 65 72 69 | 63 20 46 61 78 32 26 41 |..Generi|c Fax2&A|
|00000010| 52 41 26 44 61 74 61 00 | 00 00 00 00 00 00 00 00 |RA&Data.|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 73 4c 69 | 4e 01 00 00 00 00 00 00 |.TEXTsLi|N.......|
|00000050| 00 00 00 00 00 19 c4 00 | 00 01 91 a8 66 b8 b8 a8 |........|....f...|
|00000060| 66 b8 b8 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |f.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 20 40 00 00 |........|.... @..|
|00000080| 21 20 56 65 72 73 69 6f | 6e 20 31 2e 35 0d 21 0d |! Versio|n 1.5.!.|
|00000090| 21 24 20 52 65 71 75 69 | 72 65 73 3a 20 43 6c 61 |!$ Requi|res: Cla|
|000000a0| 73 73 20 32 20 66 61 78 | 20 6d 6f 64 65 6d 2c 20 |ss 2 fax| modem, |
|000000b0| 68 61 72 64 77 61 72 65 | 20 68 61 6e 64 73 68 61 |hardware| handsha|
|000000c0| 6b 69 6e 67 20 63 61 62 | 6c 65 2e 0d 0d 21 24 20 |king cab|le...!$ |
|000000d0| 53 75 70 70 6f 72 74 73 | 3a 20 66 61 78 2c 20 41 |Supports|: fax, A|
|000000e0| 52 41 2c 20 61 6e 64 20 | 61 20 67 65 6e 65 72 69 |RA, and |a generi|
|000000f0| 63 20 63 6f 6d 6d 2e 20 | 73 6f 66 74 77 61 72 65 |c comm. |software|
|00000100| 20 69 6e 20 74 68 65 20 | 73 65 72 76 65 72 20 6d | in the |server m|
|00000110| 6f 64 65 2e 0d 0d 21 24 | 20 55 73 65 3a 20 20 20 |ode...!$| Use:   |
|00000120| 43 6c 61 73 73 20 32 20 | 66 6f 72 20 46 61 78 2c |Class 2 |for Fax,|
|00000130| 20 41 52 41 2f 4c 69 6e | 65 53 68 61 72 65 20 66 | ARA/Lin|eShare f|
|00000140| 6f 72 20 41 52 41 2e 0d | 0d 21 24 20 52 65 61 64 |or ARA..|.!$ Read|
|00000150| 3a 20 20 79 6f 75 72 20 | 6d 6f 64 65 6d 20 6d 61 |:  your |modem ma|
|00000160| 6e 75 61 6c 20 74 6f 20 | 6d 6f 64 69 66 79 20 74 |nual to |modify t|
|00000170| 68 65 20 22 41 54 22 20 | 73 74 72 69 6e 67 73 2e |he "AT" |strings.|
|00000180| 0d 0d 21 24 20 53 65 65 | 3a 20 20 20 74 68 65 20 |..!$ See|:   the |
|00000190| 47 65 6e 65 72 69 63 20 | 53 63 72 69 70 74 73 20 |Generic |Scripts |
|000001a0| 47 75 69 64 65 20 66 6f | 72 20 64 65 74 61 69 6c |Guide fo|r detail|
|000001b0| 73 2e 0d 0d 5e 32 20 53 | 70 65 61 6b 65 72 20 4f |s...^2 S|peaker O|
|000001c0| 6e 3a 20 20 20 20 20 20 | 20 20 3d 20 45 6e 75 6d |n:      |  = Enum|
|000001d0| 28 22 4e 65 76 65 72 22 | 20 3d 20 22 30 22 20 2c |("Never"| = "0" ,|
|000001e0| 20 20 22 57 68 65 6e 20 | 43 6f 6e 6e 65 63 74 69 |  "When |Connecti|
|000001f0| 6e 67 22 20 3d 20 22 31 | 22 2c 20 22 41 6c 77 61 |ng" = "1|", "Alwa|
|00000200| 79 73 22 3d 22 32 22 29 | 20 22 31 22 0d 5e 33 20 |ys"="2")| "1".^3 |
|00000210| 53 70 65 61 6b 65 72 20 | 56 6f 6c 75 6d 65 3a 20 |Speaker |Volume: |
|00000220| 20 20 20 3d 20 45 6e 75 | 6d 28 22 4c 6f 77 22 3d |   = Enu|m("Low"=|
|00000230| 22 31 22 2c 22 4d 65 64 | 69 75 6d 22 3d 22 32 22 |"1","Med|ium"="2"|
|00000240| 2c 22 48 69 67 68 22 3d | 22 33 22 29 20 22 32 22 |,"High"=|"3") "2"|
|00000250| 0d 5e 34 20 41 6e 73 77 | 65 72 20 4f 6e 3a 20 20 |.^4 Answ|er On:  |
|00000260| 20 20 20 20 20 20 20 3d | 20 45 6e 75 6d 28 22 31 |       =| Enum("1|
|00000270| 20 52 69 6e 67 22 3d 22 | 31 22 2c 22 32 20 52 69 | Ring"="|1","2 Ri|
|00000280| 6e 67 73 22 3d 22 32 22 | 2c 22 33 20 52 69 6e 67 |ngs"="2"|,"3 Ring|
|00000290| 73 22 3d 22 33 22 2c 22 | 35 20 52 69 6e 67 73 22 |s"="3","|5 Rings"|
|000002a0| 3d 22 35 22 2c 22 37 20 | 52 69 6e 67 73 22 3d 22 |="5","7 |Rings"="|
|000002b0| 37 22 29 20 22 32 22 0d | 5e 35 20 46 61 78 20 49 |7") "2".|^5 Fax I|
|000002c0| 64 65 6e 74 69 66 69 65 | 72 3a 20 20 20 20 3d 20 |dentifie|r:    = |
|000002d0| 54 65 78 74 20 22 53 74 | 61 6c 6b 65 72 5f 47 6d |Text "St|alker_Gm|
|000002e0| 62 48 22 0d 5e 36 20 41 | 54 20 66 6f 72 20 52 65 |bH".^6 A|T for Re|
|000002f0| 63 65 69 76 65 3a 20 20 | 3d 20 54 65 78 74 20 22 |ceive:  |= Text "|
|00000300| 26 51 39 53 34 38 3d 37 | 53 33 36 3d 33 57 31 22 |&Q9S48=7|S36=3W1"|
|00000310| 0d 5e 37 20 41 54 20 66 | 6f 72 20 48 57 20 48 61 |.^7 AT f|or HW Ha|
|00000320| 6e 64 73 68 61 6b 65 3a | 20 3d 20 54 65 78 74 20 |ndshake:| = Text |
|00000330| 22 26 4b 33 22 0d 5e 38 | 20 41 54 20 66 6f 72 20 |"&K3".^8| AT for |
|00000340| 53 57 20 48 61 6e 64 73 | 68 61 6b 65 3a 20 3d 20 |SW Hands|hake: = |
|00000350| 54 65 78 74 20 22 26 4b | 34 22 0d 5e 39 20 41 54 |Text "&K|4".^9 AT|
|00000360| 20 66 6f 72 20 4e 6f 72 | 6d 61 6c 20 6d 6f 64 65 | for Nor|mal mode|
|00000370| 3a 20 20 3d 20 54 65 78 | 74 20 22 5c 4e 30 57 31 |:  = Tex|t "\N0W1|
|00000380| 22 0d 0d 21 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |"..! ---|--------|
|00000390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|000003b0| 21 20 52 65 73 65 74 74 | 69 6e 67 20 74 68 65 20 |! Resett|ing the |
|000003c0| 6d 6f 64 65 6d 3a 0d 21 | 20 2d 2d 2d 2d 2d 2d 2d |modem:.!| -------|
|000003d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003f0| 2d 2d 2d 0d 40 48 61 6e | 67 75 70 0d 20 20 53 65 |---.@Han|gup.  Se|
|00000400| 74 54 72 69 65 73 20 32 | 0d 20 20 46 6c 75 73 68 |tTries 2|.  Flush|
|00000410| 0d 20 20 48 73 52 65 73 | 65 74 20 30 2c 30 2c 31 |.  HsRes|et 0,0,1|
|00000420| 37 2c 31 39 2c 30 2c 30 | 0d 21 0d 21 20 54 72 79 |7,19,0,0|.!.! Try|
|00000430| 20 74 6f 20 63 61 74 63 | 68 20 74 68 65 20 22 4f | to catc|h the "O|
|00000440| 4b 22 20 61 6e 73 77 65 | 72 2c 20 75 73 65 20 74 |K" answe|r, use t|
|00000450| 68 65 20 45 73 63 61 70 | 65 20 73 65 71 20 61 6e |he Escap|e seq an|
|00000460| 64 20 44 54 52 20 74 72 | 61 6e 73 69 74 69 6f 6e |d DTR tr|ansition|
|00000470| 73 0d 21 20 74 6f 20 65 | 6e 74 65 72 20 74 68 65 |s.! to e|nter the|
|00000480| 20 63 6f 6d 6d 61 6e 64 | 20 6d 6f 64 65 0d 21 0d | command| mode.!.|
|00000490| 40 4c 61 62 65 6c 20 31 | 0d 20 20 6d 61 74 63 68 |@Label 1|.  match|
|000004a0| 63 6c 72 0d 20 20 6d 61 | 74 63 68 73 74 72 20 31 |clr.  ma|tchstr 1|
|000004b0| 20 32 20 22 4f 4b 5c 72 | 5c 6e 22 0d 20 20 77 72 | 2 "OK\r|\n".  wr|
|000004c0| 69 74 65 20 22 41 54 48 | 30 26 46 5c 72 22 0d 20 |ite "ATH|0&F\r". |
|000004d0| 20 6d 61 74 63 68 72 65 | 61 64 20 32 30 0d 20 20 | matchre|ad 20.  |
|000004e0| 57 72 69 74 65 20 22 2b | 2b 2b 22 0d 20 20 44 74 |Write "+|++".  Dt|
|000004f0| 72 43 6c 65 61 72 0d 20 | 20 70 61 75 73 65 20 31 |rClear. | pause 1|
|00000500| 30 0d 20 20 44 74 72 53 | 65 74 0d 21 0d 20 20 44 |0.  DtrS|et.!.  D|
|00000510| 65 63 54 72 69 65 73 0d | 20 20 49 66 54 72 69 65 |ecTries.|  IfTrie|
|00000520| 73 20 30 20 31 0d 21 0d | 21 20 4f 53 45 72 72 20 |s 0 1.!.|! OSErr |
|00000530| 2d 36 30 31 39 20 22 4d | 6f 64 65 6d 20 65 72 72 |-6019 "M|odem err|
|00000540| 6f 72 20 2d 20 74 68 65 | 20 6d 6f 64 65 6d 20 69 |or - the| modem i|
|00000550| 73 20 6e 6f 74 20 72 65 | 73 70 6f 6e 64 69 6e 67 |s not re|sponding|
|00000560| 22 0d 21 0d 20 20 65 78 | 69 74 20 2d 36 30 31 39 |".!.  ex|it -6019|
|00000570| 0d 40 4c 61 62 65 6c 20 | 32 0d 20 20 77 72 69 74 |.@Label |2.  writ|
|00000580| 65 20 22 41 54 2b 46 43 | 4c 41 53 53 3d 30 5c 72 |e "AT+FC|LASS=0\r|
|00000590| 22 0d 20 20 4a 73 72 20 | 31 30 30 0d 20 20 77 72 |".  Jsr |100.  wr|
|000005a0| 69 74 65 20 22 41 54 2b | 46 41 41 3d 30 5c 72 22 |ite "AT+|FAA=0\r"|
|000005b0| 0d 20 20 4a 73 72 20 31 | 30 30 0d 20 20 65 78 69 |.  Jsr 1|00.  exi|
|000005c0| 74 20 30 0d 21 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |t 0.! --|--------|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005f0| 0d 21 20 20 20 20 52 65 | 63 65 69 76 69 6e 67 20 |.!    Re|ceiving |
|00000600| 69 6e 63 6f 6d 69 6e 67 | 20 63 61 6c 6c 73 0d 21 |incoming| calls.!|
|00000610| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00000620| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000630| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 40 41 4e 53 |--------|---.@ANS|
|00000640| 57 45 52 0d 40 4c 61 62 | 65 6c 20 31 30 0d 20 20 |WER.@Lab|el 10.  |
|00000650| 53 65 72 52 65 73 65 74 | 20 31 39 32 30 30 2c 30 |SerReset| 19200,0|
|00000660| 2c 38 2c 31 0d 20 20 4a | 73 72 20 38 30 0d 21 0d |,8,1.  J|sr 80.!.|
|00000670| 21 20 53 65 74 20 74 68 | 65 20 63 6f 6d 6d 6f 6e |! Set th|e common|
|00000680| 20 6f 70 74 69 6f 6e 73 | 0d 20 20 4a 73 72 20 37 | options|.  Jsr 7|
|00000690| 30 0d 21 0d 21 20 53 65 | 74 20 74 68 65 20 63 6f |0.!.! Se|t the co|
|000006a0| 6d 6d 75 6e 69 63 61 74 | 69 6f 6e 20 6f 70 74 69 |mmunicat|ion opti|
|000006b0| 6f 6e 73 3a 0d 21 20 a5 | 20 5e 36 20 66 6f 72 20 |ons:.! .| ^6 for |
|000006c0| 72 65 63 65 69 76 65 20 | 6d 6f 64 65 20 28 64 69 |receive |mode (di|
|000006d0| 73 61 62 6c 65 20 4d 4e | 50 29 2c 20 3c 44 43 45 |sable MN|P), <DCE|
|000006e0| 20 53 70 65 65 64 3e 2f | 41 52 51 20 6d 65 73 73 | Speed>/|ARQ mess|
|000006f0| 61 67 65 0d 21 20 a5 20 | 5e 37 20 48 57 20 66 6c |age.! . |^7 HW fl|
|00000700| 6f 77 20 63 6f 6e 74 72 | 6f 6c 0d 21 21 0d 20 20 |ow contr|ol.!!.  |
|00000710| 57 72 69 74 65 20 22 41 | 54 5e 37 5e 36 5c 72 22 |Write "A|T^7^6\r"|
|00000720| 0d 20 20 4a 73 72 20 31 | 30 30 0d 21 0d 21 20 53 |.  Jsr 1|00.!.! S|
|00000730| 65 74 20 46 61 78 20 70 | 61 72 61 6d 65 74 65 72 |et Fax p|arameter|
|00000740| 73 3a 20 4c 49 44 2c 20 | 44 43 43 2c 42 4f 52 0d |s: LID, |DCC,BOR.|
|00000750| 21 0d 20 20 57 72 69 74 | 65 20 22 41 54 2b 46 43 |!.  Writ|e "AT+FC|
|00000760| 4c 41 53 53 3d 32 5c 72 | 22 0d 20 20 4a 73 72 20 |LASS=2\r|".  Jsr |
|00000770| 31 30 30 0d 20 20 57 72 | 69 74 65 20 22 41 54 2b |100.  Wr|ite "AT+|
|00000780| 46 4c 49 44 3d 5c 22 5e | 35 5c 22 5c 72 22 0d 20 |FLID=\"^|5\"\r". |
|00000790| 20 4a 73 72 20 31 30 30 | 0d 20 20 57 72 69 74 65 | Jsr 100|.  Write|
|000007a0| 20 22 41 54 2b 46 44 43 | 43 3d 31 2c 33 2c 30 2c | "AT+FDC|C=1,3,0,|
|000007b0| 32 2c 30 2c 30 2c 30 2c | 30 5c 72 22 0d 20 20 4a |2,0,0,0,|0\r".  J|
|000007c0| 73 72 20 31 30 30 0d 20 | 20 57 72 69 74 65 20 22 |sr 100. | Write "|
|000007d0| 41 54 2b 46 42 4f 52 3d | 31 5c 72 22 0d 20 20 4a |AT+FBOR=|1\r".  J|
|000007e0| 73 72 20 31 30 30 0d 21 | 0d 21 20 41 6c 6c 6f 77 |sr 100.!|.! Allow|
|000007f0| 20 6d 6f 64 65 6d 20 74 | 6f 20 72 65 63 65 69 76 | modem t|o receiv|
|00000800| 65 20 66 61 78 20 6d 65 | 73 73 61 67 65 73 0d 21 |e fax me|ssages.!|
|00000810| 0d 20 20 57 72 69 74 65 | 20 22 41 54 2b 46 43 52 |.  Write| "AT+FCR|
|00000820| 3d 31 5c 72 22 0d 20 20 | 4a 73 72 20 31 30 30 0d |=1\r".  |Jsr 100.|
|00000830| 21 0d 21 20 54 65 6c 6c | 20 74 68 65 20 6d 6f 64 |!.! Tell| the mod|
|00000840| 65 6d 20 74 6f 20 64 65 | 74 65 72 6d 69 6e 65 20 |em to de|termine |
|00000850| 74 68 65 20 74 79 70 65 | 20 6f 66 20 74 68 65 20 |the type| of the |
|00000860| 69 6e 63 6f 6d 69 6e 67 | 20 63 61 6c 6c 0d 21 20 |incoming| call.! |
|00000870| 46 65 74 63 68 20 74 68 | 65 20 74 75 62 65 20 61 |Fetch th|e tube a|
|00000880| 66 74 65 72 20 5e 34 20 | 72 69 6e 67 73 0d 21 0d |fter ^4 |rings.!.|
|00000890| 20 20 57 72 69 74 65 20 | 22 41 54 53 30 3d 5e 34 |  Write |"ATS0=^4|
|000008a0| 2b 46 41 41 3d 31 5c 72 | 22 0d 20 20 4a 73 72 20 |+FAA=1\r|".  Jsr |
|000008b0| 31 30 30 0d 20 20 4e 6f | 74 65 20 22 57 61 69 74 |100.  No|te "Wait|
|000008c0| 69 6e 67 20 66 6f 72 20 | 46 61 78 2f 41 52 41 2f |ing for |Fax/ARA/|
|000008d0| 44 61 74 61 20 63 61 6c | 6c 73 c9 22 0d 21 0d 21 |Data cal|ls.".!.!|
|000008e0| 20 45 76 65 72 79 74 68 | 69 6e 67 20 69 73 20 72 | Everyth|ing is r|
|000008f0| 65 61 64 79 20 2d 20 6c | 65 74 27 73 20 73 69 74 |eady - l|et's sit|
|00000900| 20 61 6e 64 20 77 61 69 | 74 20 66 6f 72 20 61 20 | and wai|t for a |
|00000910| 63 61 6c 6c 0d 21 20 57 | 65 27 6c 6c 20 77 61 69 |call.! W|e'll wai|
|00000920| 74 20 66 6f 72 20 32 20 | 6d 69 6e 75 74 65 73 2c |t for 2 |minutes,|
|00000930| 20 74 68 65 6e 20 72 65 | 69 6e 69 74 69 61 74 65 | then re|initiate|
|00000940| 20 74 68 65 20 6d 6f 64 | 65 6d 0d 21 0d 40 4c 61 | the mod|em.!.@La|
|00000950| 62 65 6c 20 31 32 0d 20 | 20 4d 61 74 63 68 43 6c |bel 12. | MatchCl|
|00000960| 72 0d 20 20 6d 61 74 63 | 68 73 74 72 20 31 20 31 |r.  matc|hstr 1 1|
|00000970| 33 20 22 52 49 4e 47 5c | 72 5c 6e 22 0d 20 20 6d |3 "RING\|r\n".  m|
|00000980| 61 74 63 68 73 74 72 20 | 32 20 32 31 20 22 5c 72 |atchstr |2 21 "\r|
|00000990| 5c 6e 43 4f 4e 4e 45 43 | 54 20 5e 24 2f 41 52 51 |\nCONNEC|T ^$/ARQ|
|000009a0| 22 0d 20 20 6d 61 74 63 | 68 73 74 72 20 33 20 31 |".  matc|hstr 3 1|
|000009b0| 35 20 22 5c 72 5c 6e 43 | 4f 4e 4e 45 43 54 20 5e |5 "\r\nC|ONNECT ^|
|000009c0| 24 5c 72 5c 6e 22 0d 20 | 20 6d 61 74 63 68 73 74 |$\r\n". | matchst|
|000009d0| 72 20 39 20 34 30 20 22 | 5c 72 5c 6e 2b 46 43 4f |r 9 40 "|\r\n+FCO|
|000009e0| 4e 22 0d 20 20 6d 61 74 | 63 68 73 74 72 20 31 30 |N".  mat|chstr 10|
|000009f0| 20 31 30 20 22 5c 72 5c | 6e 4e 4f 20 22 0d 20 20 | 10 "\r\|nNO ".  |
|00000a00| 6d 61 74 63 68 73 74 72 | 20 31 31 20 31 30 20 22 |matchstr| 11 10 "|
|00000a10| 5c 72 5c 6e 42 55 53 59 | 22 0d 20 20 4d 61 74 63 |\r\nBUSY|".  Matc|
|00000a20| 68 72 65 61 64 20 31 32 | 30 30 0d 20 20 4a 75 6d |hread 12|00.  Jum|
|00000a30| 70 20 31 30 0d 40 4c 61 | 62 65 6c 20 31 33 0d 20 |p 10.@La|bel 13. |
|00000a40| 20 4e 6f 74 65 20 22 52 | 69 6e 67 c9 22 0d 20 20 | Note "R|ing.".  |
|00000a50| 4a 75 6d 70 20 31 32 0d | 21 0d 21 20 44 61 74 61 |Jump 12.|!.! Data|
|00000a60| 20 63 6f 6e 6e 65 63 74 | 69 6f 6e 20 68 61 73 20 | connect|ion has |
|00000a70| 62 65 65 6e 20 65 73 74 | 61 62 6c 69 73 68 65 64 |been est|ablished|
|00000a80| 20 28 77 65 20 72 65 61 | 64 20 22 43 4f 4e 4e 45 | (we rea|d "CONNE|
|00000a90| 43 54 20 58 58 58 5c 72 | 5c 6e 22 29 0d 21 20 50 |CT XXX\r|\n").! P|
|00000aa0| 75 74 20 74 68 65 20 22 | 43 4f 4e 4e 45 43 54 22 |ut the "|CONNECT"|
|00000ab0| 20 62 61 63 6b 20 74 6f | 20 74 68 65 20 62 75 66 | back to| the buf|
|00000ac0| 66 65 72 20 61 6e 64 20 | 61 74 74 61 63 68 20 74 |fer and |attach t|
|00000ad0| 68 65 20 22 44 61 74 61 | 22 20 73 75 62 50 6f 72 |he "Data|" subPor|
|00000ae0| 74 0d 21 20 69 66 20 69 | 74 20 77 61 73 20 61 6e |t.! if i|t was an|
|00000af0| 20 69 6e 63 6f 6d 69 6e | 67 20 63 61 6c 6c 2c 20 | incomin|g call, |
|00000b00| 70 75 74 20 74 68 65 20 | 22 52 49 4e 47 22 20 62 |put the |"RING" b|
|00000b10| 65 66 6f 72 65 20 74 68 | 65 20 22 43 4f 4e 4e 45 |efore th|e "CONNE|
|00000b20| 43 54 22 0d 21 0d 40 4c | 61 62 65 6c 20 31 35 0d |CT".!.@L|abel 15.|
|00000b30| 20 20 53 65 74 56 61 72 | 20 41 20 22 5e 24 22 0d |  SetVar| A "^$".|
|00000b40| 20 20 4e 6f 74 65 20 22 | 4e 6f 6e 2d 56 2e 34 32 |  Note "|Non-V.42|
|00000b50| 20 43 61 6c 6c 20 61 74 | 20 5e 41 20 62 70 73 2e | Call at| ^A bps.|
|00000b60| 20 57 61 69 74 69 6e 67 | 20 66 6f 72 20 61 6e 20 | Waiting| for an |
|00000b70| 41 52 41 20 66 72 61 6d | 65 2e 22 0d 20 20 4d 61 |ARA fram|e.".  Ma|
|00000b80| 74 63 68 43 6c 72 0d 20 | 20 4d 61 74 63 68 53 74 |tchClr. | MatchSt|
|00000b90| 72 20 31 20 32 30 20 22 | 5c 72 22 0d 20 20 4d 61 |r 1 20 "|\r".  Ma|
|00000ba0| 74 63 68 53 74 72 20 32 | 20 33 30 20 22 5c 30 38 |tchStr 2| 30 "\08|
|00000bb0| 5c 30 31 5c 30 33 5c 31 | 34 5c 30 34 5c 30 33 5c |\01\03\1|4\04\03\|
|00000bc0| 30 30 5c 30 38 5c 32 35 | 30 5c 31 36 5c 30 33 22 |00\08\25|0\16\03"|
|00000bd0| 0d 20 20 4d 61 74 63 68 | 52 65 61 64 20 34 30 0d |.  Match|Read 40.|
|00000be0| 0d 40 4c 61 62 65 6c 20 | 32 30 0d 20 20 4e 6f 74 |.@Label |20.  Not|
|00000bf0| 65 20 22 4e 6f 6e 2d 41 | 52 41 20 63 61 6c 6c 22 |e "Non-A|RA call"|
|00000c00| 0d 20 20 46 6c 75 73 68 | 0d 20 20 4a 75 6d 70 20 |.  Flush|.  Jump |
|00000c10| 32 34 0d 21 0d 21 20 56 | 2e 34 32 20 63 61 6c 6c |24.!.! V|.42 call|
|00000c20| 20 64 65 74 65 63 74 65 | 64 0d 21 0d 40 4c 61 62 | detecte|d.!.@Lab|
|00000c30| 65 6c 20 32 31 0d 20 20 | 53 65 74 56 61 72 20 41 |el 21.  |SetVar A|
|00000c40| 20 22 5e 24 22 0d 20 20 | 4e 6f 74 65 20 22 56 2e | "^$".  |Note "V.|
|00000c50| 34 32 20 43 61 6c 6c 20 | 61 74 20 5e 41 20 62 70 |42 Call |at ^A bp|
|00000c60| 73 22 0d 20 20 4d 61 74 | 63 68 43 6c 72 0d 20 20 |s".  Mat|chClr.  |
|00000c70| 4d 61 74 63 68 53 74 72 | 20 31 20 32 34 20 22 5c |MatchStr| 1 24 "\|
|00000c80| 72 5c 6e 22 0d 20 20 4d | 61 74 63 68 52 65 61 64 |r\n".  M|atchRead|
|00000c90| 20 35 0d 40 4c 61 62 65 | 6c 20 32 34 0d 20 20 51 | 5.@Labe|l 24.  Q|
|00000ca0| 75 65 75 65 49 6e 70 75 | 74 20 22 5c 72 5c 6e 52 |ueueInpu|t "\r\nR|
|00000cb0| 49 4e 47 5c 72 5c 6e 5c | 72 5c 6e 43 4f 4e 4e 45 |ING\r\n\|r\nCONNE|
|00000cc0| 43 54 20 5e 41 5c 72 5c | 6e 22 0d 40 4c 61 62 65 |CT ^A\r\|n".@Labe|
|00000cd0| 6c 20 32 35 0d 20 20 41 | 74 74 61 63 68 20 22 44 |l 25.  A|ttach "D|
|00000ce0| 61 74 61 22 20 28 44 54 | 52 2c 45 73 63 61 70 65 |ata" (DT|R,Escape|
|00000cf0| 2c 54 69 6d 65 4c 69 6d | 69 74 3d 30 29 0d 0d 21 |,TimeLim|it=0)..!|
|00000d00| 0d 21 20 54 68 65 20 41 | 52 41 20 28 4d 4e 50 20 |.! The A|RA (MNP |
|00000d10| 34 29 20 66 72 61 6d 65 | 20 64 65 74 65 63 74 65 |4) frame| detecte|
|00000d20| 64 0d 21 0d 40 4c 61 62 | 65 6c 20 33 30 0d 20 20 |d.!.@Lab|el 30.  |
|00000d30| 4e 6f 74 65 20 22 41 52 | 41 20 63 61 6c 6c 20 61 |Note "AR|A call a|
|00000d40| 74 20 5e 41 20 62 70 73 | 2e 22 0d 20 20 46 6c 75 |t ^A bps|.".  Flu|
|00000d50| 73 68 0d 20 20 51 75 65 | 75 65 49 6e 70 75 74 20 |sh.  Que|ueInput |
|00000d60| 22 5c 72 5c 6e 52 49 4e | 47 5c 72 5c 6e 5c 72 5c |"\r\nRIN|G\r\n\r\|
|00000d70| 6e 43 41 52 52 49 45 52 | 20 5e 41 5c 72 5c 6e 22 |nCARRIER| ^A\r\n"|
|00000d80| 0d 40 4c 61 62 65 6c 20 | 33 32 0d 20 20 41 74 74 |.@Label |32.  Att|
|00000d90| 61 63 68 20 22 41 52 41 | 22 20 28 44 54 52 2c 45 |ach "ARA|" (DTR,E|
|00000da0| 73 63 61 70 65 2c 54 69 | 6d 65 4c 69 6d 69 74 3d |scape,Ti|meLimit=|
|00000db0| 30 29 0d 0d 21 0d 21 20 | 46 61 78 20 63 6f 6e 6e |0)..!.! |Fax conn|
|00000dc0| 65 63 74 69 6f 6e 20 68 | 61 73 20 62 65 65 6e 20 |ection h|as been |
|00000dd0| 65 73 74 61 62 6c 69 73 | 68 65 64 20 28 77 65 20 |establis|hed (we |
|00000de0| 72 65 61 64 20 22 2b 46 | 43 4f 4e 22 29 0d 21 20 |read "+F|CON").! |
|00000df0| 50 75 74 20 74 68 65 20 | 2b 46 43 4f 4e 20 62 61 |Put the |+FCON ba|
|00000e00| 63 6b 20 74 6f 20 74 68 | 65 20 62 75 66 66 65 72 |ck to th|e buffer|
|00000e10| 2c 0d 21 20 69 66 20 69 | 74 20 77 61 73 20 61 6e |,.! if i|t was an|
|00000e20| 20 69 6e 63 6f 6d 69 6e | 67 20 63 61 6c 6c 2c 20 | incomin|g call, |
|00000e30| 70 75 74 20 74 68 65 20 | 22 52 49 4e 47 22 20 62 |put the |"RING" b|
|00000e40| 65 66 6f 72 65 20 74 68 | 65 20 22 2b 46 43 4f 4e |efore th|e "+FCON|
|00000e50| 22 0d 21 20 41 74 74 61 | 63 68 20 74 68 65 20 22 |".! Atta|ch the "|
|00000e60| 46 61 78 22 20 73 75 62 | 50 6f 72 74 0d 21 0d 40 |Fax" sub|Port.!.@|
|00000e70| 4c 61 62 65 6c 20 34 30 | 0d 20 20 51 75 65 75 65 |Label 40|.  Queue|
|00000e80| 49 6e 70 75 74 20 22 5c | 72 5c 6e 2b 46 43 4f 4e |Input "\|r\n+FCON|
|00000e90| 22 0d 20 20 69 66 4f 72 | 69 67 69 6e 61 74 65 20 |".  ifOr|iginate |
|00000ea0| 34 31 0d 20 20 51 75 65 | 75 65 49 6e 70 75 74 20 |41.  Que|ueInput |
|00000eb0| 22 5c 72 5c 6e 52 49 4e | 47 5c 72 5c 6e 22 0d 40 |"\r\nRIN|G\r\n".@|
|00000ec0| 4c 61 62 65 6c 20 34 31 | 0d 20 20 41 74 74 61 63 |Label 41|.  Attac|
|00000ed0| 68 20 22 46 61 78 22 20 | 28 44 54 52 2c 52 65 73 |h "Fax" |(DTR,Res|
|00000ee0| 65 74 2c 45 73 63 61 70 | 65 2c 49 64 6c 65 4c 69 |et,Escap|e,IdleLi|
|00000ef0| 6d 69 74 3d 33 30 29 0d | 0d 21 20 2d 2d 2d 2d 2d |mit=30).|.! -----|
|00000f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f20| 2d 2d 2d 2d 2d 0d 21 20 | 4f 72 69 67 69 6e 61 74 |-----.! |Originat|
|00000f30| 69 6e 67 20 61 20 63 61 | 6c 6c 20 74 68 72 6f 75 |ing a ca|ll throu|
|00000f40| 67 68 20 74 68 65 20 22 | 41 52 41 22 20 73 75 62 |gh the "|ARA" sub|
|00000f50| 70 6f 72 74 0d 21 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |port.! -|--------|
|00000f60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f80| 2d 0d 40 4f 52 49 47 49 | 4e 41 54 45 20 22 41 52 |-.@ORIGI|NATE "AR|
|00000f90| 41 22 0d 20 20 53 65 72 | 52 65 73 65 74 20 31 39 |A".  Ser|Reset 19|
|00000fa0| 32 30 30 2c 30 2c 38 2c | 31 0d 20 20 4a 73 72 20 |200,0,8,|1.  Jsr |
|00000fb0| 38 30 0d 21 0d 21 20 53 | 65 74 20 74 68 65 20 63 |80.!.! S|et the c|
|00000fc0| 6f 6d 6d 6f 6e 20 6f 70 | 74 69 6f 6e 73 0d 21 0d |ommon op|tions.!.|
|00000fd0| 20 20 4a 73 72 20 37 30 | 0d 21 0d 21 20 53 65 74 |  Jsr 70|.!.! Set|
|00000fe0| 20 74 68 65 20 44 61 74 | 61 20 6d 6f 64 65 3a 0d | the Dat|a mode:.|
|00000ff0| 21 20 a5 20 5e 39 20 4e | 6f 72 6d 61 6c 20 63 6f |! . ^9 N|ormal co|
|00001000| 6e 6e 65 63 74 69 6f 6e | 2c 20 44 43 45 20 73 70 |nnection|, DCE sp|
|00001010| 65 65 64 0d 21 20 a5 20 | 5e 37 20 20 48 61 72 64 |eed.! . |^7  Hard|
|00001020| 77 61 72 65 20 68 61 6e | 64 73 68 61 6b 65 0d 21 |ware han|dshake.!|
|00001030| 20 a5 ca 53 37 3a 20 20 | 74 69 6d 65 2d 6f 75 74 | ..S7:  |time-out|
|00001040| 20 28 39 30 20 73 65 63 | 29 20 66 6f 72 20 6c 6f | (90 sec|) for lo|
|00001050| 6e 67 2d 64 69 73 74 61 | 6e 63 65 20 63 61 6c 6c |ng-dista|nce call|
|00001060| 20 28 69 66 20 79 6f 75 | 20 75 73 65 20 74 68 65 | (if you| use the|
|00001070| 6d 29 0d 21 0d 20 20 57 | 72 69 74 65 20 22 41 54 |m).!.  W|rite "AT|
|00001080| 5e 37 5e 39 5c 72 22 0d | 20 20 4a 73 72 20 31 30 |^7^9\r".|  Jsr 10|
|00001090| 30 0d 21 0d 21 20 50 72 | 65 70 61 72 65 20 74 6f |0.!.! Pr|epare to|
|000010a0| 20 72 65 63 65 69 76 65 | 20 61 6c 6c 20 65 72 72 | receive| all err|
|000010b0| 6f 72 20 72 65 73 75 6c | 74 20 63 6f 64 65 73 0d |or resul|t codes.|
|000010c0| 21 0d 20 20 4a 73 72 20 | 39 30 0d 20 20 4d 61 74 |!.  Jsr |90.  Mat|
|000010d0| 63 68 53 74 72 20 31 20 | 34 35 20 22 5c 72 5c 6e |chStr 1 |45 "\r\n|
|000010e0| 43 4f 4e 4e 45 43 54 20 | 22 0d 20 20 4d 61 74 63 |CONNECT |".  Matc|
|000010f0| 68 52 65 61 64 20 39 30 | 30 0d 20 20 57 72 69 74 |hRead 90|0.  Writ|
|00001100| 65 20 22 5c 72 22 0d 20 | 20 45 78 69 74 20 2d 36 |e "\r". | Exit -6|
|00001110| 30 31 39 0d 0d 40 4c 61 | 62 65 6c 20 34 35 0d 20 |019..@La|bel 45. |
|00001120| 20 51 75 65 75 65 49 6e | 70 75 74 20 22 5c 72 5c | QueueIn|put "\r\|
|00001130| 6e 43 41 52 52 49 45 52 | 20 22 0d 20 20 4a 75 6d |nCARRIER| ".  Jum|
|00001140| 70 20 33 32 0d 0d 21 20 | 2d 2d 2d 2d 2d 2d 2d 2d |p 32..! |--------|
|00001150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001170| 2d 2d 0d 21 20 4f 72 69 | 67 69 6e 61 74 69 6e 67 |--.! Ori|ginating|
|00001180| 20 61 20 63 61 6c 6c 20 | 74 68 72 6f 75 67 68 20 | a call |through |
|00001190| 74 68 65 20 22 44 61 74 | 61 22 20 73 75 62 70 6f |the "Dat|a" subpo|
|000011a0| 72 74 0d 21 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |rt.! ---|--------|
|000011b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|000011d0| 40 4f 52 49 47 49 4e 41 | 54 45 20 22 44 61 74 61 |@ORIGINA|TE "Data|
|000011e0| 22 0d 20 20 53 65 72 52 | 65 73 65 74 20 31 39 32 |".  SerR|eset 192|
|000011f0| 30 30 2c 30 2c 38 2c 31 | 0d 20 20 4a 73 72 20 38 |00,0,8,1|.  Jsr 8|
|00001200| 30 0d 20 20 4a 73 72 20 | 37 30 0d 21 0d 21 20 4e |0.  Jsr |70.!.! N|
|00001210| 6f 77 20 65 6d 69 74 20 | 61 6c 6c 20 63 6f 6d 6d |ow emit |all comm|
|00001220| 61 6e 64 73 20 74 68 61 | 74 20 74 68 65 20 61 70 |ands tha|t the ap|
|00001230| 70 6c 69 63 61 74 69 6f | 6e 20 68 61 73 20 73 65 |plicatio|n has se|
|00001240| 6e 74 20 74 6f 20 74 68 | 61 74 20 70 6f 72 74 0d |nt to th|at port.|
|00001250| 21 0d 20 20 4a 73 72 20 | 36 30 0d 20 20 53 65 72 |!.  Jsr |60.  Ser|
|00001260| 52 65 73 65 74 20 2a 0d | 20 20 4a 73 72 20 38 30 |Reset *.|  Jsr 80|
|00001270| 0d 21 0d 21 20 50 72 65 | 70 61 72 65 20 74 6f 20 |.!.! Pre|pare to |
|00001280| 72 65 63 65 69 76 65 20 | 61 6c 6c 20 65 72 72 6f |receive |all erro|
|00001290| 72 20 72 65 73 75 6c 74 | 20 63 6f 64 65 73 0d 21 |r result| codes.!|
|000012a0| 0d 20 20 46 6c 75 73 68 | 0d 20 20 4a 73 72 20 39 |.  Flush|.  Jsr 9|
|000012b0| 30 0d 20 20 4d 61 74 63 | 68 53 74 72 20 31 20 34 |0.  Matc|hStr 1 4|
|000012c0| 38 20 22 5e 24 5c 72 5c | 6e 43 4f 4e 4e 45 43 54 |8 "^$\r\|nCONNECT|
|000012d0| 22 0d 20 20 4d 61 74 63 | 68 52 65 61 64 20 39 30 |".  Matc|hRead 90|
|000012e0| 30 0d 20 20 57 72 69 74 | 65 20 22 5c 72 22 0d 20 |0.  Writ|e "\r". |
|000012f0| 20 45 78 69 74 20 2d 36 | 30 31 39 0d 40 4c 61 62 | Exit -6|019.@Lab|
|00001300| 65 6c 20 34 38 0d 20 20 | 51 75 65 75 65 49 6e 70 |el 48.  |QueueInp|
|00001310| 75 74 20 22 5e 24 5c 72 | 5c 6e 43 4f 4e 4e 45 43 |ut "^$\r|\nCONNEC|
|00001320| 54 22 0d 20 20 4a 75 6d | 70 20 32 35 0d 0d 21 20 |T".  Jum|p 25..! |
|00001330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 21 20 4f 72 69 |--------|--.! Ori|
|00001360| 67 69 6e 61 74 69 6e 67 | 20 61 20 63 61 6c 6c 20 |ginating| a call |
|00001370| 74 68 72 6f 75 67 68 20 | 74 68 65 20 22 46 61 78 |through |the "Fax|
|00001380| 22 20 73 75 62 50 6f 72 | 74 0d 21 20 2d 2d 2d 2d |" subPor|t.! ----|
|00001390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013b0| 2d 2d 2d 2d 2d 2d 0d 40 | 4f 52 49 47 49 4e 41 54 |------.@|ORIGINAT|
|000013c0| 45 20 22 46 61 78 22 20 | 28 22 5c 72 5c 6e 4c 69 |E "Fax" |("\r\nLi|
|000013d0| 6e 65 53 68 61 72 65 20 | 4c 69 6e 65 20 69 73 20 |neShare |Line is |
|000013e0| 42 75 73 79 5c 72 5c 6e | 42 55 53 59 5c 72 5c 6e |Busy\r\n|BUSY\r\n|
|000013f0| 22 29 0d 20 20 53 65 72 | 52 65 73 65 74 20 31 39 |").  Ser|Reset 19|
|00001400| 32 30 30 2c 30 2c 38 2c | 31 0d 20 20 4a 73 72 20 |200,0,8,|1.  Jsr |
|00001410| 38 30 0d 21 0d 21 20 53 | 65 74 20 74 68 65 20 63 |80.!.! S|et the c|
|00001420| 6f 6d 6d 6f 6e 20 6f 70 | 74 69 6f 6e 73 0d 21 0d |ommon op|tions.!.|
|00001430| 20 20 4a 73 72 20 37 30 | 0d 21 0d 21 20 53 65 74 |  Jsr 70|.!.! Set|
|00001440| 20 74 68 65 20 46 61 78 | 20 6d 6f 64 65 0d 21 0d | the Fax| mode.!.|
|00001450| 20 20 57 72 69 74 65 20 | 22 41 54 5e 38 2b 46 43 |  Write |"AT^8+FC|
|00001460| 4c 41 53 53 3d 32 5c 72 | 22 0d 20 20 4a 73 72 20 |LASS=2\r|".  Jsr |
|00001470| 31 30 30 0d 21 0d 21 20 | 4e 6f 77 20 65 6d 69 74 |100.!.! |Now emit|
|00001480| 20 61 6c 6c 20 63 6f 6d | 6d 61 6e 64 73 20 74 68 | all com|mands th|
|00001490| 61 74 20 74 68 65 20 61 | 70 70 6c 69 63 61 74 69 |at the a|pplicati|
|000014a0| 6f 6e 20 68 61 73 20 73 | 65 6e 74 20 74 6f 20 74 |on has s|ent to t|
|000014b0| 68 61 74 20 70 6f 72 74 | 2c 0d 21 20 50 72 65 70 |hat port|,.! Prep|
|000014c0| 61 72 65 20 74 6f 20 72 | 65 63 65 69 76 65 20 61 |are to r|eceive a|
|000014d0| 6c 6c 20 65 72 72 6f 72 | 20 72 65 73 75 6c 74 20 |ll error| result |
|000014e0| 63 6f 64 65 73 0d 21 0d | 20 20 4a 73 72 20 36 30 |codes.!.|  Jsr 60|
|000014f0| 0d 20 20 4a 73 72 20 39 | 30 0d 20 20 4d 61 74 63 |.  Jsr 9|0.  Matc|
|00001500| 68 53 74 72 20 31 20 34 | 30 20 22 5c 72 5c 6e 2b |hStr 1 4|0 "\r\n+|
|00001510| 46 43 4f 4e 22 0d 20 20 | 4d 61 74 63 68 52 65 61 |FCON".  |MatchRea|
|00001520| 64 20 37 30 30 0d 20 20 | 57 72 69 74 65 20 22 5c |d 700.  |Write "\|
|00001530| 72 22 0d 20 20 45 78 69 | 74 20 2d 36 30 31 39 0d |r".  Exi|t -6019.|
|00001540| 0d 21 0d 21 20 54 68 69 | 73 20 73 65 63 74 69 6f |.!.! Thi|s sectio|
|00001550| 6e 20 65 6d 69 74 73 20 | 61 6c 6c 20 6d 6f 64 65 |n emits |all mode|
|00001560| 6d 20 63 6f 6d 6d 61 6e | 64 73 20 73 65 6e 74 20 |m comman|ds sent |
|00001570| 66 72 6f 6d 20 74 68 65 | 20 63 6c 69 65 6e 74 20 |from the| client |
|00001580| 61 70 70 6c 69 63 61 74 | 69 6f 6e 0d 21 20 46 6f |applicat|ion.! Fo|
|00001590| 72 20 65 61 63 68 20 73 | 65 74 20 6f 66 20 63 6f |r each s|et of co|
|000015a0| 6d 6d 61 6e 64 73 20 74 | 68 65 20 22 4f 4b 22 20 |mmands t|he "OK" |
|000015b0| 61 6e 73 77 65 72 20 69 | 73 20 61 77 61 69 74 65 |answer i|s awaite|
|000015c0| 64 0d 21 0d 40 4c 61 62 | 65 6c 20 36 30 0d 20 20 |d.!.@Lab|el 60.  |
|000015d0| 45 6d 69 74 53 74 61 72 | 74 0d 40 4c 61 62 65 6c |EmitStar|t.@Label|
|000015e0| 20 36 31 0d 20 20 45 6d | 69 74 43 6f 6d 6d 61 6e | 61.  Em|itComman|
|000015f0| 64 20 36 32 0d 20 20 4a | 73 72 20 31 30 30 0d 20 |d 62.  J|sr 100. |
|00001600| 20 4a 75 6d 70 20 36 31 | 0d 40 4c 61 62 65 6c 20 | Jump 61|.@Label |
|00001610| 36 32 0d 20 20 72 65 74 | 75 72 6e 0d 21 0d 21 20 |62.  ret|urn.!.! |
|00001620| 54 68 69 73 20 73 65 63 | 74 69 6f 6e 20 69 6e 69 |This sec|tion ini|
|00001630| 74 69 61 74 65 73 20 74 | 68 65 20 6d 6f 64 65 6d |tiates t|he modem|
|00001640| 20 62 65 66 6f 72 65 20 | 41 4e 53 57 45 52 20 61 | before |ANSWER a|
|00001650| 6e 64 20 4f 52 49 47 49 | 4e 41 54 45 73 3a 0d 21 |nd ORIGI|NATEs:.!|
|00001660| 20 64 69 61 6c 74 6f 6e | 65 20 64 65 74 65 63 74 | dialton|e detect|
|00001670| 20 2b 20 63 6f 6e 6e 65 | 63 74 20 61 74 20 74 68 | + conne|ct at th|
|00001680| 65 20 68 69 67 68 65 73 | 74 20 72 61 74 65 20 2b |e highes|t rate +|
|00001690| 20 73 70 65 61 6b 65 72 | 20 63 6f 6e 74 72 6f 6c | speaker| control|
|000016a0| 20 2b 0d 21 20 68 61 6e | 67 20 75 70 20 6f 6e 20 | +.! han|g up on |
|000016b0| 44 74 72 20 64 72 6f 70 | 20 2b 20 44 43 44 20 76 |Dtr drop| + DCD v|
|000016c0| 61 6c 69 64 0d 21 20 56 | 65 72 62 61 6c 20 72 65 |alid.! V|erbal re|
|000016d0| 73 70 6f 6e 73 65 73 20 | 6d 6f 64 65 2c 20 6e 6f |sponses |mode, no|
|000016e0| 20 65 63 68 6f 0d 21 20 | 44 69 73 61 62 6c 65 20 | echo.! |Disable |
|000016f0| 65 78 74 65 6e 64 65 64 | 20 63 6f 64 65 73 0d 21 |extended| codes.!|
|00001700| 0d 40 4c 61 62 65 6c 20 | 37 30 0d 20 20 57 72 69 |.@Label |70.  Wri|
|00001710| 74 65 20 22 41 54 58 34 | 4d 5e 32 4c 5e 33 26 44 |te "ATX4|M^2L^3&D|
|00001720| 32 26 43 31 56 31 45 30 | 5c 72 22 0d 20 20 4a 73 |2&C1V1E0|\r".  Js|
|00001730| 72 20 31 30 30 0d 20 20 | 72 65 74 75 72 6e 20 0d |r 100.  |return .|
|00001740| 21 0d 21 20 54 68 69 73 | 20 73 65 63 74 69 6f 6e |!.! This| section|
|00001750| 20 73 79 6e 63 72 6f 6e | 69 7a 65 20 74 68 65 20 | syncron|ize the |
|00001760| 6d 6f 64 65 6d 20 61 66 | 74 65 72 20 74 68 65 20 |modem af|ter the |
|00001770| 73 65 72 69 61 6c 20 70 | 6f 72 74 20 73 70 65 65 |serial p|ort spee|
|00001780| 64 20 73 77 69 74 63 68 | 69 6e 67 0d 21 0d 40 4c |d switch|ing.!.@L|
|00001790| 61 62 65 6c 20 38 30 0d | 20 20 43 68 72 44 65 6c |abel 80.|  ChrDel|
|000017a0| 61 79 20 31 0d 20 20 57 | 72 69 74 65 20 22 41 54 |ay 1.  W|rite "AT|
|000017b0| 5c 72 22 0d 20 20 43 68 | 72 44 65 6c 61 79 20 30 |\r".  Ch|rDelay 0|
|000017c0| 0d 20 20 4a 73 72 20 31 | 30 30 0d 20 20 72 65 74 |.  Jsr 1|00.  ret|
|000017d0| 75 72 6e 0d 21 0d 21 20 | 50 72 65 70 61 72 65 20 |urn.!.! |Prepare |
|000017e0| 74 6f 20 72 65 63 65 69 | 76 65 20 65 72 72 6f 72 |to recei|ve error|
|000017f0| 20 72 65 73 75 6c 74 20 | 63 6f 64 65 73 0d 21 0d | result |codes.!.|
|00001800| 40 4c 61 62 65 6c 20 39 | 30 0d 20 20 4d 61 74 63 |@Label 9|0.  Matc|
|00001810| 68 43 6c 72 0d 20 20 4d | 61 74 63 68 53 74 72 20 |hClr.  M|atchStr |
|00001820| 32 20 39 31 20 22 4e 4f | 20 44 49 41 4c 54 4f 4e |2 91 "NO| DIALTON|
|00001830| 45 5c 72 5c 6e 22 0d 20 | 20 4d 61 74 63 68 53 74 |E\r\n". | MatchSt|
|00001840| 72 20 33 20 39 32 20 22 | 42 55 53 59 5c 72 5c 6e |r 3 92 "|BUSY\r\n|
|00001850| 22 0d 20 20 4d 61 74 63 | 68 53 74 72 20 34 20 39 |".  Matc|hStr 4 9|
|00001860| 33 20 22 4e 4f 20 43 41 | 52 52 49 45 52 5c 72 5c |3 "NO CA|RRIER\r\|
|00001870| 6e 22 0d 20 20 4d 61 74 | 63 68 53 74 72 20 35 20 |n".  Mat|chStr 5 |
|00001880| 39 34 20 22 4e 4f 20 41 | 4e 53 57 45 52 5c 72 5c |94 "NO A|NSWER\r\|
|00001890| 6e 22 0d 20 20 57 72 69 | 74 65 20 22 41 54 44 5e |n".  Wri|te "ATD^|
|000018a0| 31 5c 72 22 0d 20 20 48 | 73 52 65 73 65 74 20 2a |1\r".  H|sReset *|
|000018b0| 0d 20 20 72 65 74 75 72 | 6e 0d 0d 40 4c 61 62 65 |.  retur|n..@Labe|
|000018c0| 6c 20 39 31 0d 20 20 65 | 78 69 74 20 2d 36 30 32 |l 91.  e|xit -602|
|000018d0| 30 0d 40 4c 61 62 65 6c | 20 39 32 0d 20 20 65 78 |0.@Label| 92.  ex|
|000018e0| 69 74 20 2d 36 30 32 32 | 0d 40 4c 61 62 65 6c 20 |it -6022|.@Label |
|000018f0| 39 33 0d 20 20 65 78 69 | 74 20 2d 36 30 32 31 0d |93.  exi|t -6021.|
|00001900| 40 4c 61 62 65 6c 20 39 | 34 0d 20 20 65 78 69 74 |@Label 9|4.  exit|
|00001910| 20 2d 36 30 32 33 0d 21 | 0d 21 20 50 72 6f 63 65 | -6023.!|.! Proce|
|00001920| 73 73 69 6e 67 20 74 68 | 65 20 41 54 20 63 6f 6d |ssing th|e AT com|
|00001930| 6d 61 6e 64 3a 0d 21 20 | 4f 4b 20 2d 3e 20 70 72 |mand:.! |OK -> pr|
|00001940| 6f 63 65 65 64 0d 21 20 | 45 52 52 4f 52 20 6f 72 |oceed.! |ERROR or|
|00001950| 20 54 69 6d 65 4f 75 74 | 20 2d 3e 65 78 69 74 20 | TimeOut| ->exit |
|00001960| 2d 36 30 31 39 0d 21 20 | 49 74 20 63 61 6e 20 62 |-6019.! |It can b|
|00001970| 65 20 63 61 6c 6c 65 64 | 20 41 46 54 45 52 20 74 |e called| AFTER t|
|00001980| 68 65 20 22 57 72 69 74 | 65 22 20 63 6f 6d 6d 61 |he "Writ|e" comma|
|00001990| 6e 64 2c 20 73 69 6e 63 | 65 20 4c 69 6e 65 53 68 |nd, sinc|e LineSh|
|000019a0| 61 72 65 20 62 75 66 66 | 65 72 73 20 69 6e 70 75 |are buff|ers inpu|
|000019b0| 74 0d 21 0d 40 4c 61 62 | 65 6c 20 31 30 30 0d 20 |t.!.@Lab|el 100. |
|000019c0| 20 4d 61 74 63 68 43 6c | 72 0d 20 20 4d 61 74 63 | MatchCl|r.  Matc|
|000019d0| 68 53 74 72 20 31 20 31 | 30 32 20 22 5c 72 5c 6e |hStr 1 1|02 "\r\n|
|000019e0| 4f 4b 5c 72 5c 6e 22 0d | 20 20 4d 61 74 63 68 53 |OK\r\n".|  MatchS|
|000019f0| 74 72 20 32 20 31 30 31 | 20 22 5c 72 5c 6e 45 52 |tr 2 101| "\r\nER|
|00001a00| 52 4f 52 5c 72 5c 6e 22 | 0d 20 20 4d 61 74 63 68 |ROR\r\n"|.  Match|
|00001a10| 52 65 61 64 20 32 30 0d | 40 4c 61 62 65 6c 20 31 |Read 20.|@Label 1|
|00001a20| 30 31 0d 20 20 45 78 69 | 74 20 2d 36 30 31 39 0d |01.  Exi|t -6019.|
|00001a30| 40 4c 61 62 65 6c 20 31 | 30 32 0d 20 20 72 65 74 |@Label 1|02.  ret|
|00001a40| 75 72 6e 0d 00 00 00 00 | 00 00 00 00 00 00 00 00 |urn.....|........|
|00001a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a80| 00 00 01 00 00 00 01 53 | 00 00 00 53 00 00 00 3e |.......S|...S...>|
|00001a90| 11 4e 91 7a 72 50 01 24 | ba 7f cb bf 12 20 6e 00 |.N.zrP.$|..... n.|
|00001aa0| 0c 58 ae 92 78 56 7f 7e | bf 50 01 25 4a 38 01 a0 |.X..xV.~|.P.%J8..|
|00001ab0| 15 47 65 6e 65 72 69 63 | 20 46 61 78 32 26 41 52 |.Generic| Fax2&AR|
|00001ac0| 41 26 44 61 74 61 02 00 | 00 00 54 45 58 54 73 4c |A&Data..|..TEXTsL|
|00001ad0| 00 00 54 45 58 54 73 4c | 69 4e 01 00 00 8c 00 00 |..TEXTsL|iN......|
|00001ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001af0| 00 00 a7 17 77 50 00 00 | 19 c4 00 00 01 91 72 01 |....wP..|......r.|
|00001b00| a8 73 68 6a 73 01 1c 00 | 9f 13 4e 5e 4e 75 4e 56 |.shjs...|..N^NuNV|
|00001b10| 5b 5c 9b 01 3e 2e 7b 25 | 01 2d 6e 4f 5b 03 4a 47 |[\..>.{%|.-nO[.JG|
|00001b20| 6f 34 60 1c 57 5b 34 01 | 02 78 cc 52 7f 7e bf 50 |o4`.W[4.|.x.R.~.P|
|00001b30| 01 24 e2 12 4f ef 00 10 | e0 01 53 47 c5 01 6e dc |.$..O...|..SG..n.|
|00001b40| 7f 01 26 68 e2 51 01 08 | e8 a3 bf b7 5b 73 c4 79 |..&h.Q..|....[s.y|
|00001b50| 3c 2a 10 19 70 24 2f 00 | 4e ad 01 ba 28 40 20 0c |<*..p$/.|N...(@ .|
|00001b60| 58 8f 67 3a 70 01 22 0c | 66 16 2f 00 72 22 2f 01 |X.g:p.".|f./.r"/.|
|00001b70| 4e ad 01 ba 58 8f 22 00 | 20 1f 4a 81 66 02 70 00 |N...X.".| .J.f.p.|
|00001b80| 00 00 00 2e 01 40 80 00 | 00 00 03 31 2e 34 23 76 |.....@..|...1.4#v|
|00001b90| 31 2e 34 20 43 6f 70 79 | 72 69 67 68 74 20 a9 20 |1.4 Copy|right . |
|00001ba0| 31 39 39 33 2c 0d 53 74 | 61 6c 6b 65 72 20 47 6d |1993,.St|alker Gm|
|00001bb0| 62 48 00 00 00 1d 01 40 | 80 00 00 00 03 31 2e 34 |bH.....@|.....1.4|
|00001bc0| 12 4c 69 6e 65 53 68 61 | 72 65 20 53 6f 66 74 77 |.LineSha|re Softw|
|00001bd0| 61 72 65 00 00 01 00 00 | 00 01 53 00 00 00 53 00 |are.....|..S...S.|
|00001be0| 00 00 3e 00 55 40 ec 0c | dc 00 00 00 1c 00 3e 00 |..>.U@..|......>.|
|00001bf0| 00 76 65 72 73 00 01 00 | 0a 00 01 ff ff 00 00 00 |.vers...|........|
|00001c00| 00 00 55 3f 48 00 02 ff | ff 00 00 00 32 00 55 3f |..U?H...|....2.U?|
|00001c10| 54 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |T.......|........|
|00001c20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+